Những câu hỏi liên quan
Lucky Kate
Xem chi tiết
Bao112233
17 tháng 12 2022 lúc 21:22

b) 

#include <iostream>
using namespace std;
int a;
int main(){
    cin>>a;
    if (a%2==0) cout<<a<<" la so chan";
    else cout<<a<< "la so le";
    return 0;
}

Bình luận (0)
Vy Thea
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 12 2022 lúc 0:14

Input: a,b

Output: max,min của hai số a,b

Bình luận (0)
Queen King
Xem chi tiết
Nguyễn Lê Phước Thịnh
25 tháng 12 2020 lúc 22:52

a) Xác định bài toán

-Input: Số nguyên a

-Output: Kiểm tra xem a có là bội của 5 không?

b) Viết chương trình

uses crt;

var a:integer;

begin

clrscr;

write('Nhap a='); readln(a);

if a mod 5=0 then writeln('a=',a,' la boi so cua 5')

else writeln('a=',a,' khong la boi cua 5');

readln;

end.

Bình luận (0)
Hoilamgi
Xem chi tiết

lên mạng đi bạn 

làm Pascal khó lắm

Bình luận (0)
Tuân Trần
Xem chi tiết
Nguyễn Lê Phước Thịnh
28 tháng 2 2021 lúc 10:23

uses crt;

var n,i,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

s:=0;

for i:=1 to n do  

  s:=s+i;

writeln(s);

readln;

end.

Bình luận (0)
Tri Le
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 12 2021 lúc 23:19

b: 

#include <bits/stdc++.h>

using namespace std;

long long a,b,t;

int main()

{

cin>>a>>b;

t=a+b;

cout<<t;

return 0;

}

Bình luận (0)
Yến Nhi Nhi
Xem chi tiết
Nguyễn Lê Phước Thịnh
4 tháng 1 2023 lúc 14:54

Bài 1:

Input: Số n

Output: Kiểm tra xem n có chia hết cho 5 ko

Mô tả thuật toán:

Bước 1: Nhập n

Bước 2: Nếu n chia hết cho 5 thì xuất ra có

không thì không

Bước 3: Kết thúc

Viết ct:

uses crt;

var n:integer;

begin

clrscr;

readln(n);

if n mod 5=0 then write('yes')

else write('no');

readln;

end.

Bình luận (0)
Huyền Nguyễn
Xem chi tiết
Cheewin
9 tháng 11 2016 lúc 22:47

1.uses crt;

var n,gt:longint;

begin

clrscr;

repeat

write('nhap so n:');readln(n);

until n>0;

gt:=1;

while n>0 do

begin

gt:=gt*n;

n:=n-1;

end;

writeln('giai thua cua n la:',gt);

readln

end.

2. uses crt;

var a,b,c:real;

begin

clrscr;

write('nhap a=');readln(a);

write('nhap b=');readln(b);

write('nhap c=');readln(c);

if (a*a=b*b+c*c) or (b*=c*c+a*a) or (c*c=a*a+b*b) then writeln('khong phai la tam giac vuong');

readln

end.

 

Bình luận (0)
Trần Phúc Tâm
Xem chi tiết
Nguyễn Lê Phước Thịnh
9 tháng 11 2021 lúc 23:23

#include <bits/stdc++.h>
using namespace std;
long long n,m;
//chuongtrinhcon
long long tcs(long long n)
{
    long long t=0;
    for (i=1; i<=n-1; i++)
        if (n%i==0) t=t+i;
    return(t);
}
//chuongtrinhchinh
int main()
{
    cin>>n>>m;
    if ((tcs(n)==m) and (tcs(m)==n)) cout<<"Yes";
    else cout<<"No";
}

 

Bình luận (0)